Editor-Aufruf

Möglichkeiten, den ABAP-Editor aufzurufen gibt es viele. Hier zeigen wir Ihnen einige davon…

ABAP Editor

EDITOR-CALL

Der einfachste Aufruf:

DATA lv_progname TYPE syrepid.
lv_progname = 'ZZMEINPROGRAMM'.
EDITOR-CALL FOR REPORT lv_progname.

RS_TOOL_ACCESS

  CALL FUNCTION 'RS_TOOL_ACCESS'
     EXPORTING
       operation           = 'DOCS'
       object_name         = 'ZZPROGNAME'
       object_type         = 'PROG'
     EXCEPTIONS
       not_executed        = 1
       invalid_object_type = 2
       OTHERS              = 3.

Programm TPDA_EDITOR_START

DATA prg_info  TYPE tpda_prg_info.
DATA dynp_info TYPE tpda_dynp_info.

authority-check object 'S_DEVELOP'
  id 'DEVCLASS' field '*'
  id 'OBJTYPE' field '*'
  id 'OBJNAME' field '*'
  id 'P_GROUP' field '*'
  id 'ACTVT' field '3'.

IF dynp IS NOT INITIAL.
  dynp_info-program  = prgm.
  dynp_info-dynpnr   = dynp.
  dynp_info-dynpline = line.
ELSE.
  prg_info-program  = prgm.
  prg_info-include  = incl.
  prg_info-line     = line.
ENDIF.

CALL METHOD cl_tpda_services_tools=>navigate_to_source
  EXPORTING
    p_prg_info  = prg_info
    p_dynp_info = dynp_info.

Funktionsbaustein EDITOR_PROGRAM

CALL FUNCTION 'EDITOR_PROGRAM'
  EXPORTING
    display = 'X'
    program = 'ZZTESTPROG'
  EXCEPTIONS
    OTHERS  = 2.
Enno Wulff